!*****************************************************************************************
!> author: Jacob Williams
!  date: 12/22/2015
!  license: BSD
!
!  Numeric kind definitions.

    module slsqp_kinds

#ifdef REAL64
    use, intrinsic :: iso_fortran_env, only: real_kind => real64
#else
    use, intrinsic :: iso_fortran_env, only: real_kind => real32
#endif

    implicit none

    private

    integer,parameter,public :: wp = real_kind  !! Using "double precision" real kinds

    end module slsqp_kinds
!*****************************************************************************************
